home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 3 / BBS in a box - Trilogy III.iso / Files / MacTechNotes / Platforms & Tools / Stand-Alone Code Folder / CWDEFƒ / MyWindowDef.a next >
Encoding:
Text File  |  1990-07-24  |  496 b   |  12 lines  |  [TEXT/MPS ]

  1. StdWDEF    MAIN EXPORT                   ; this will be the entry point
  2.            IMPORT MyWindowDef           ; name of Pascal FUNCTION that is the WDEF
  3.                                        ; we IMPORT externally referenced routines
  4.                                        ; from Pascal (in this case, just this one)
  5.            BRA.S    @0                   ; branch around the header to the actual code
  6.            DC.W     0                   ; flags word
  7.            DC.B     'WDEF'               ; type
  8.            DC.W     3                   ; ID number
  9.            DC.W     0                   ; version
  10. @0           JMP        MyWindowDef        ; this calls the Pascal WDEF
  11.            END
  12.